//========================= следва програмен текст ==========================
ПРОГРАМА Население                           // Заглавието е задължително.
                                             // Виж по-долу "Граматика".
КОНСТАНТИ
 ако_са_равни 2                              // Тази двойка ще ни трябва по-долу
                                             // за условен преход.
ПРОМЕНЛИВИ
 въведено     ''                             // дума за въвеждане
 буква        ''                             // ще ни трябва за да съставим дума
 въпрос       ''                             // въпросно изречение
 отговор      ''                             // дума за извеждане
 град         ''                             // За апликацията е нужен град,
 жители       ''                             // стрингов еквивалент на бройката,
 брой         0                              // брой - работно число,
 родени       0                              // данни за раждаемост
 умрели       0                              // и за смъртност.

КОД                                          // Следват командни линии.
 постави    въпрос, ' Въведете името на града '   // Първо програмата трябва да
 подпреход  @искай_въвеждане                 // поиска данните, с които ще работи.
 постави    град, въведено
 постави    въпрос, ' Въведете населението в началото '
 подпреход  @искай_въвеждане
 превърни   брой, въведено                   // "въведено" е стринг а "брой" е число
 постави    въпрос, ' Въведете колко са родени от началало до сега '
 подпреход  @искай_въвеждане
 превърни   родени, въведено
 постави    въпрос, ' Въведете колко са умрели от началало до сега '
 подпреход  @искай_въвеждане
 превърни   умрели, въведено                 // Край на въвеждането, следва обработка...
 събери     брой, родени
 извади     брой, умрели                     // Край на обработката,
 постави    отговор, 'Решение: В град '      // подготовка за извеждането...
 събери     отговор, град
 събери     отговор, ' сега живеят '
 превърни   жители, брой
 събери     отговор, жители
 събери     отговор, ' души.'
 изход      отговор                          // Извеждане на резултата...
 преход     @край                            // Прескочи следващите подпрограми.

@искай_въвеждане                             // Подпрограма за диалог въпрос-въведено
 изход      въпрос                           // Изобразява въпроса
 подпреход  @въведи_дума                     // Приеми въведеното. (виж по-долу)
 обратно

@въведи_дума                                 // подпрограма за въвеждане на дума
 постави    въведено ''                      // Изчисти думата за да започне начисто...
@входен_цикъл                                // подпрограма за въвеждане на буква
 вход       буква                            // един клавиш-една буква
 сравни     буква, #13                       // Виж по-долу Флагов регистър
 условно    @думата_е_въведена, ако_са_равни // преход при условие 2
 събери     въведено, буква                  // буква по буква - дума става
 преход     @входен_цикъл                    // и така - до клавиш Enter
@думата_е_въведена
 обратно

@край
//========================= край на програмния текст ==========================